package com.demo.groupchat;

import java.io.IOException;
import java.net.InetSocketAddress;
import java.net.Socket;
import java.nio.ByteBuffer;
import java.nio.channels.*;
import java.util.Iterator;

/**
 * @author gy
 * @date 2022/5/21
 */
public class GroupChatServer {
    // 定义属性
    private Selector selector;
    private ServerSocketChannel listenChannel;
    private static final int PORT = 6667;

    /**
     * 构造器
     * 初始化工作
     */
    public GroupChatServer() {
        try {
            // 得到选择器
            selector = Selector.open();
            // ServerSocketChannel
            listenChannel = ServerSocketChannel.open();
            // 绑定端口
            listenChannel.socket().bind(new InetSocketAddress(PORT));
            // 设置非阻塞模式
            listenChannel.configureBlocking(false);
            // 将该listenChannel 注册到 selector
            listenChannel.register(selector, SelectionKey.OP_ACCEPT);

        } catch (Exception e) {
            e.printStackTrace();
        }
    }

    /**
     * 监听
     * @param
     */
    public void listen(){

        System.out.println("监听线程 " + Thread.currentThread().getName());

        try {
            // 循环处理
            while (true) {
                /*
                 selector 充当了 选择器，相当于 reactor
                 */
                int count = selector.select();
                // 如果有事件处理
                if (count > 0){
                    // 遍历得到 selectionKey 集合
                    Iterator<SelectionKey> keyIterator = selector.selectedKeys().iterator();
                    while (keyIterator.hasNext()) {
                        // 取出 selectionKey
                        SelectionKey key = keyIterator.next();
                        // 监听到 accept
                        if (key.isAcceptable()){
                            /*
                                一旦发现你是个连接请求就调用了 accept（）
                             */
                            SocketChannel sc = listenChannel.accept();
                            // 一定要设置非阻塞
                            sc.configureBlocking(false);
                            // 将该 sc 注册到 selector 中
                            // todo SelectionKey.OP_READ ???
                            sc.register(selector,SelectionKey.OP_READ);
                            // 提示
                            System.out.println(sc.getRemoteAddress() + " 上线 ");
                        }
                        // 通道发送 read事件，即通道是可读的状态
                        if (key.isReadable()){
                            // TODO 通过专门写 处理读的方法
                            readData(key);
                        }

                        // 手动从集合中移动当前的 selectionKey，防止重复操作
                        keyIterator.remove();
                    }

                }else {
                    System.out.println("等待.........");
                }
            }
        } catch (Exception e) {
            e.printStackTrace();
        } finally {

        }
    }

    /**
     * 读取客户端消息
     * @param key
     */
    private void readData(SelectionKey key){

        // 取到关联的channel
        SocketChannel channel = null;

        try {
            // 得到 channel
            channel = (SocketChannel)key.channel();
            // 创建 buffer
            ByteBuffer buffer = ByteBuffer.allocate(1024);

            int readLength = channel.read(buffer);
            // 根据count的值做处理
            if (readLength > 0) {
                // 把缓存区的数据转换成字符串
                String msg = new String(buffer.array());
                // 输出该消息
                System.out.println("form 客户端: " + msg);

                // TODO 向其他的客户端转发消息 专门封装个方法进行处理
                sendInfoToOtherClients(msg,channel);
            }

        } catch (Exception e) {
            try {
                System.out.println(channel.getRemoteAddress() + " 离线了 ......");
                // 取消注册
                key.cancel();
                // 关闭通道
                channel.close();
            } catch (IOException ioException) {
                ioException.printStackTrace();
            }
        }

    }

    /**
     * 转发消息给其他的客户（通道）
     * 注意：要去掉自己
     * @param msg 发送的消息
     * @param self 自己
     */
    private void sendInfoToOtherClients(String msg,SocketChannel self) throws IOException {

        System.out.println("服务器转发消息中...");

        System.out.println("服务器转发消息给客户端线程：" + Thread.currentThread().getName());

        // 遍历 所有注册到 selector 上的 SocketChannel，并排除自己
        for (SelectionKey key : selector.keys()) {
            // 通过 key 取出对应的 SocketChannel
            Channel targetChannel = key.channel();
            // 排除自己
            if(targetChannel instanceof SocketChannel && targetChannel != self){
                // 转型
                SocketChannel dest = (SocketChannel) targetChannel;
                // 将msg 存储到 buffer
                ByteBuffer buffer = ByteBuffer.wrap(msg.getBytes());
                // 将 buffer的 数据写入 通道
                dest.write(buffer);
            }

        }

    }


    public static void main(String[] args) {
        // 创建服务器对象
        GroupChatServer groupChatServer = new GroupChatServer();
        groupChatServer.listen();
    }
}

/**
 *  读数据、业务处理、回送数据 都在handler里面进行
 */
class MyHandler{
    public void readData(){

    }

    public void sendInfoToOtherClients(){

    }
}
